home *** CD-ROM | disk | FTP | other *** search
/ Cream of the Crop 26 / Cream of the Crop 26.iso / os2 / yatsee11.zip / REGISTER.CMD < prev    next >
OS/2 REXX Batch file  |  1997-05-15  |  2KB  |  49 lines
  1. /* Execute this program after you have copied all of the files       */
  2. /* in a subdirectory of your choice.                                 */
  3. /* This program will create an icon on the desktop and               */
  4. /* register the program for you. If you already have an icon         */
  5. /* for Yatsee on the desktop, please delete the icon before          */
  6. /* calling this program.                                             */
  7. /* Please enter your name and the key exactly as on the              */
  8. /* letter/Email that you got, because the values are casesensitive   */
  9.  
  10. call RxFuncAdd "SysLoadFuncs","REXXUTIL","SysLoadFuncs"
  11. call SysLoadFuncs
  12.  
  13. say "                             Yatsee 1.1"
  14. say ""
  15. say "The installation program will create an icon for Yatsee on the desktop"
  16. say ""
  17. say "Continue?"
  18. say "(Y/N)"
  19.  
  20. PARSE PULL reply
  21. If reply = "N" | reply = "n" then exit
  22.  
  23.  
  24. title="Yatsee 1.1"
  25. classname='WPProgram'
  26. location='<WP_DESKTOP>'
  27. curdir=directory()'\yatsee.exe'
  28. say 'Please enter your name:'
  29. parse pull name
  30. say 'Please enter your key:'
  31. pull key
  32.  
  33. result=SysCreateObject(classname,title,location,'PARAMETERS=-N 'name' -K 'key';PROGTYPE=PM;EXENAME='curdir'')
  34.  
  35. If result then
  36.    say "Icon for Yatsee 1.1 created..."
  37. else do
  38.    say "ERROR              : The objects have not been installed,due to an error."
  39.    say "POSSIBLE CAUSE     : The objects already exist on the desktop."
  40.    say "ACTION             : Remove the already existing objects and try again."
  41.    pull key
  42. end
  43.  
  44.  
  45.  
  46.  
  47.  
  48.  
  49.